home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / msdos / aset10.zip / ASET5.TST < prev    next >
Text File  |  1993-05-06  |  1KB  |  59 lines

  1. # $Id: aset5.tst 1.1 1993/03/09 13:01:25 Ricki Exp $
  2. # Test file for ASETs interactive functions
  3. #
  4. #       $Log: aset5.tst $
  5. #       Revision 1.1  1993/03/09  13:01:25  Ricki
  6. #       Initial revision
  7. #
  8.  
  9. #
  10. #-------GETKEY
  11. #
  12. #                               PRESS ANY KEY
  13. a=getkey
  14. a=getkey()
  15. #                               PRESS ONE OF y,Y,n,N
  16. a=getkey('yYnN')
  17. #
  18. a=getkey(1,2)
  19.  
  20. #
  21. #-------GETNUM
  22. #
  23. #                               INPUT ANY NUMBER AND <ENTER>
  24. a=getnum
  25. a=getnum(3)
  26. a=getnum(5,1.23)
  27. a=getnum(6,1.24,25)
  28. a=getnum(7,1.25,25,15)
  29. #
  30. a=getnum()
  31. a=getnum(1,2,3,4,5)
  32.  
  33. #
  34. #-------GETSTR
  35. #
  36. #                               INPUT ANY STRING AND <ENTER>
  37. a=getstr
  38. a=getstr(3)
  39. a=getstr(5,'abc')
  40. a=getstr(6,'abcd',25)
  41. a=getstr(7,'abcde',25,15)
  42. #
  43. a=getstr()
  44. a=getstr(1,2,3,4,5)
  45.  
  46. #
  47. #-------LINE
  48. #
  49. #                               INPUT ANY STRING AND <ENTER>
  50. a=getline
  51. #                               TWO TIMES: INPUT ANY STRING AND <ENTER>
  52. a=getline(2)
  53. a=getline(1,'c:\autoexec.bat')
  54. #
  55. a=getline()
  56. a=getline(1,2,3)
  57. a=getline(1,'Z:\DOES\NOT\EXIST')
  58.  
  59.